# debug-lib.pl
# debug module

BEGIN { push(@INC, '..'); };
use WebminCore;
&init_config();


sub show_variable {
	print &ui_hr();

	print '%text<br>';
	while (($key, $value) = each(%text)) {
		print $key,' = ', $value, '<br>';
	}
	
	print &ui_hr();
	
	print '%gconfig<br>';
	while (($key, $value) = each(%gconfig)) {
		print $key,' = ', $value, '<br>';
	}
	
	print &ui_hr();
	
	print'%config<br>';
	while (($key, $value) = each(%config)) {
		print $key,' = ', $value, '<br>';
	}
	
	print &ui_hr();
	
	print '%ENV<br>';
	while (($key, $value) = each(%ENV)) {
		print $key,' = ', $value, '<br>';
	}
	
	print &ui_hr();
	
	print'%in<br>';
	while (($key,$value) = each(%in)) {
		print $key,' = ', $value, '<br>';
	}

	print &ui_hr();

	print'%access<br>';
	while (($key,$value) = each(%access)) {
		print $key,' = ', $value, '<br>';
	}

	print &ui_hr();
}


1;

